home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / hypercrd / hc1_2_x / haikmstr.sit / Haiku Master / card_2066.txt < prev    next >
Text File  |  1989-10-28  |  4KB  |  158 lines
  1. -- card: 2066 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 3528
  5. -- name: saved
  6. ----- HyperTalk script -----
  7. on closeCard
  8.   if visible of cd fld id 5 then
  9.     popUp "About2"
  10.   end if
  11.   set scroll of cd fld id 1 to 0
  12. end closeCard
  13.  
  14.  
  15. -- part 1 (field)
  16. -- low flags: 00
  17. -- high flags: 0007
  18. -- rect: left=0 top=20 right=319 bottom=512
  19. -- title width / last selected line: 0
  20. -- icon id / first selected line: 0 / 0
  21. -- text alignment: 1
  22. -- font id: 3
  23. -- text size: 12
  24. -- style flags: 0
  25. -- line height: 16
  26. -- part name: saved
  27.  
  28.  
  29. -- part 5 (field)
  30. -- low flags: 81
  31. -- high flags: 2004
  32. -- rect: left=45 top=24 right=319 bottom=476
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 0 / 0
  35. -- text alignment: 0
  36. -- font id: 3
  37. -- text size: 12
  38. -- style flags: 0
  39. -- line height: 16
  40. -- part name: about2
  41. ----- HyperTalk script -----
  42. on mouseUp
  43.   popUp "About2"
  44. end mouseUp
  45.  
  46.  
  47. -- part 6 (button)
  48. -- low flags: 00
  49. -- high flags: 2000
  50. -- rect: left=14 top=320 right=341 bottom=88
  51. -- title width / last selected line: 0
  52. -- icon id / first selected line: 26635 / 26635
  53. -- text alignment: 1
  54. -- font id: 0
  55. -- text size: 12
  56. -- style flags: 0
  57. -- line height: 16
  58. -- part name: 
  59. ----- HyperTalk script -----
  60. on mouseUp
  61.   popUp "About2"
  62. end mouseUp
  63.  
  64.  
  65. -- part 2 (button)
  66. -- low flags: 00
  67. -- high flags: A004
  68. -- rect: left=95 top=321 right=340 bottom=183
  69. -- title width / last selected line: 0
  70. -- icon id / first selected line: 0 / 0
  71. -- text alignment: 1
  72. -- font id: 3
  73. -- text size: 12
  74. -- style flags: 0
  75. -- line height: 16
  76. -- part name: Edit Words
  77. ----- HyperTalk script -----
  78. on mouseUp
  79.   goEdit
  80. end mouseUp
  81.  
  82.  
  83. -- part 3 (button)
  84. -- low flags: 00
  85. -- high flags: A004
  86. -- rect: left=207 top=321 right=340 bottom=300
  87. -- title width / last selected line: 0
  88. -- icon id / first selected line: 0 / 0
  89. -- text alignment: 1
  90. -- font id: 3
  91. -- text size: 12
  92. -- style flags: 0
  93. -- line height: 16
  94. -- part name: Haiku
  95. ----- HyperTalk script -----
  96. on mouseUp
  97.   goHaiku
  98. end mouseUp
  99.  
  100.  
  101. -- part 4 (button)
  102. -- low flags: 00
  103. -- high flags: A004
  104. -- rect: left=323 top=321 right=340 bottom=439
  105. -- title width / last selected line: 0
  106. -- icon id / first selected line: 0 / 0
  107. -- text alignment: 1
  108. -- font id: 3
  109. -- text size: 12
  110. -- style flags: 0
  111. -- line height: 16
  112. -- part name: Save to Text File
  113. ----- HyperTalk script -----
  114. on mouseUp
  115.   put "SAVING TEXT"
  116.   open file "Haikus"
  117.   write cd fld id 1 to file "Haikus"
  118.   close file "Haikus"
  119.   put empty
  120.   hide msg
  121. end mouseUp
  122.  
  123.  
  124. -- part contents for card part 1
  125. ----- text -----
  126.  
  127.  serious pensive stack 
  128. transcends formidable stew
  129.  sensational!
  130.  
  131.  autumn luscious night 
  132. illuminates hidden universe.
  133.  solitude.
  134.  
  135.  so huddled ocean
  136.  O blue motion
  137.  seething baroque ineffable.
  138.  
  139.  sometimes luscious note
  140.  dances void universe
  141.  unreal variable.
  142.  
  143.  secret luscious point
  144.  sings summer cathedral
  145.  O descending center.
  146.  
  147.  
  148.  
  149. -- part contents for card part 5
  150. ----- text -----
  151.  
  152. HAIKU MASTER usually formats poems in a manner approximately, but not exactly like the traditional Japanese haiku structure of 3 lines of 5, 7 and 5 syllables. Most English translations of Japanese haikus are similarly "approximate" in their structure. 
  153.  
  154. Occasionally, overcome by an over-powering inspiration, HAIKU MASTER creates a 2 or 4 line poem. You can reformat any "over-inspired" poems that you choose to save in this field by adding or deleting returns.
  155.  
  156. Poems are saved into a text file that is named ΓÇ£HaikusΓÇ¥ and is placed into the same folder as HyperCard. You can then open and print this file with your word processor, text DA, desktop publishing program, etc.
  157.  
  158. Save your own poems here before you pass this stack on!